Freelog 50/Freelog050.iso/DossierLogitheque/Bureautique/Mira/Mira_setup.exe/{app}/Mira.exe/0/RCDATA/TFORMPREVIEW/TFORMPREVIEW.txt

Text File | 2003-09-02 | 5KB | 222 lines

object FormPreview: TFormPreview
  Left = 274
  Top = 290
  Width = 783
  Height = 667
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Aper'#231'u avant impression'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefault
  WindowState = wsMaximized
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnResize = ComboZoomClick
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object PanelBarre: TPanel
    Left = 0
    Top = 0
    Width = 775
    Height = 27
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 123
      Top = 7
      Width = 27
      Height = 14
      Caption = 'Zoom'
    end
    object Label2: TLabel
      Left = 3
      Top = 7
      Width = 24
      Height = 14
      Caption = 'Page'
    end
    object LabelPage: TLabel
      Left = 78
      Top = 7
      Width = 15
      Height = 14
      Caption = 'de '
    end
    object Bevel2: TBevel
      Left = 210
      Top = 2
      Width = 3
      Height = 22
      Shape = bsLeftLine
    end
    object ComboZoom: TComboBox
      Left = 153
      Top = 3
      Width = 55
      Height = 22
      Cursor = crHandPoint
      Hint = 'Agrandissement'
      Style = csDropDownList
      ItemHeight = 14
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = ComboZoomClick
      Items.Strings = (
        '400 %'
        '375 %'
        '350 %'
        '325 %'
        '300 %'
        '275 %'
        '225 %'
        '200 %'
        '175 %'
        '150 %'
        '125 %'
        '120 %'
        '115 %'
        '110 %'
        '100 %'
        '95 %'
        '90 %'
        '85 %'
        '80 %'
        '75 %'
        '70 %'
        '65 %'
        '60 %'
        '55 %'
        '50 %'
        '45 %'
        '40 %'
        '35 %'
        '30 %'
        '25 %'
        '20 %'
        '15 %'
        '10 %'
        '5 %')
    end
    object ComboPage: TComboBox
      Left = 33
      Top = 3
      Width = 43
      Height = 22
      Cursor = crHandPoint
      Hint = 'Changer de page'
      Style = csDropDownList
      ItemHeight = 14
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = ComboPageClick
    end
    object ButtonPrintAll: TButton
      Left = 216
      Top = 3
      Width = 88
      Height = 22
      Hint = 'Imprimer toutes les pages'
      Caption = 'Imprimer &tout'
      TabOrder = 2
      OnClick = SpeedBPrintAllClick
    end
    object ButtonPrintPage: TButton
      Left = 309
      Top = 3
      Width = 88
      Height = 22
      Hint = 'Imprimer la page en cours seulement'
      Caption = 'Imprimer la &page'
      TabOrder = 3
      OnClick = SpeedBPrintOnClick
    end
    object ButtonConfigure: TButton
      Left = 402
      Top = 3
      Width = 88
      Height = 22
      Hint = 'Configurer l'#39'imprimante'
      Caption = '&Configurer'
      TabOrder = 4
      OnClick = SpeedBConfigureClick
    end
    object ButtonClose: TButton
      Left = 495
      Top = 3
      Width = 88
      Height = 22
      Hint = 'Fermer la page aper'#231'u'
      Cancel = True
      Caption = '&Fermer'
      ModalResult = 2
      TabOrder = 5
    end
  end
  object ScrollBoxPreview: TScrollBox
    Left = 0
    Top = 27
    Width = 775
    Height = 606
    HorzScrollBar.Tracking = True
    VertScrollBar.Tracking = True
    Align = alClient
    BorderStyle = bsNone
    Color = clGray
    Ctl3D = False
    ParentColor = False
    ParentCtl3D = False
    PopupMenu = PopupMenuPreview
    TabOrder = 1
    object PaintPreview: TPaintBox
      Left = 183
      Top = 3
      Width = 364
      Height = 373
      PopupMenu = PopupMenuPreview
      OnPaint = PaintPreviewPaint
    end
  end
  object PopupMenuPreview: TPopupMenu
    Left = 648
    object Imprimertouteslespages1: TMenuItem
      Caption = 'Imprimer toutes les pages'
      OnClick = SpeedBPrintAllClick
    end
    object Imprimerlapageencours1: TMenuItem
      Caption = 'Imprimer la page en cours'
      OnClick = SpeedBPrintOnClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Ajusterlesmargesdelapage1: TMenuItem
      Caption = 'Ajuster les marges de la page'
      OnClick = SpeedBMargeClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Configurerlimprimante1: TMenuItem
      Caption = 'Configurer l'#39'imprimante'
      OnClick = SpeedBConfigureClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Fermerlapageapperu1: TMenuItem
      Caption = 'Fermer la page apper'#231'u'
      OnClick = ButtonCloseClick
    end
  end
end